SOHO - Exploring the Sun - 2003 Update/SOHO - Exploring the Sun - 2003 Update.iso/pc/data/main.dcr/scripts_84.ls

Text File | 2003-02-25 | 339 b | 22 lines

on prepareFrame
  puppetSound(1, 0)
end

on exitFrame
end

on keyDown
  global global_volume
  if the key = " " then
    go("sunmover")
  end if
  if the key = "+" then
    set global_volume to global_volume + 1
    UpdateVolume()
  end if
  if the key = "-" then
    set global_volume to global_volume - 1
    UpdateVolume()
  end if
end